inherited frmCon_ProdBoletim: TfrmCon_ProdBoletim
  Left = 199
  Top = 202
  Caption = 'Consulta de Produtos Por Boletim'
  ClientHeight = 360
  ClientWidth = 678
  OldCreateOrder = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited GB: TGroupBox
    Width = 678
    Height = 106
    object l_codigo: TLabel
      Left = 6
      Top = 63
      Width = 54
      Height = 14
      Caption = 'Descri'#231#227'o'
      Visible = False
    end
    object Label1: TLabel
      Left = 22
      Top = 33
      Width = 38
      Height = 14
      Caption = 'Ordem'
    end
    object p_ordem: TRadioGroup
      Left = 62
      Top = 22
      Width = 477
      Height = 31
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Descri'#231#227'o do Produto'
        'C'#243'digo do Produto')
      TabOrder = 0
      OnClick = p_ordemClick
    end
    object EdtDescricao: TEdit
      Left = 63
      Top = 59
      Width = 475
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 1
      OnChange = EdtDescricaoChange
    end
    object ed_produto: TMaskEdit
      Left = 62
      Top = 59
      Width = 121
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      TabOrder = 2
      Visible = False
      OnChange = ed_produtoChange
    end
  end
  inherited Panel1: TPanel
    Top = 312
    Width = 678
    inherited BtnFechar1: TFlatButton
      Left = 267
    end
  end
  inherited Panel2: TPanel
    Top = 106
    Width = 678
    Height = 206
    object DbgProduto: TDBGrid
      Left = 1
      Top = 1
      Width = 676
      Height = 204
      Align = alClient
      DataSource = ds
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      Options = [dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      OnDblClick = BtnFecharClick
      Columns = <
        item
          Expanded = False
          FieldName = 'Pro_Codigo'
          Title.Caption = 'C'#243'digo'
          Width = 113
          Visible = True
        end
        item
          Color = 16056319
          Expanded = False
          FieldName = 'Pro_CodRef'
          Title.Caption = 'C'#243'd. Ref.'
          Visible = False
        end
        item
          Color = 16056319
          Expanded = False
          FieldName = 'Pro_Nome'
          Title.Caption = 'Descri'#231#227'o'
          Width = 338
          Visible = True
        end
        item
          Alignment = taCenter
          Color = clWhite
          Expanded = False
          FieldName = 'Pro_Unidade'
          Title.Alignment = taCenter
          Title.Caption = 'UND'
          Width = 36
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Pro_Saldo'
          Title.Alignment = taRightJustify
          Title.Caption = 'Saldo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Pro_UltCusto'
          Title.Alignment = taRightJustify
          Title.Caption = #218'lt. Custo'
          Width = 76
          Visible = True
        end>
    end
  end
  object ds: TDataSource
    DataSet = tq
    Left = 580
    Top = 48
  end
  object tq: TQuery
    Left = 552
    Top = 48
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 608
    Top = 48
    object cdsPro_Codigo: TStringField
      FieldName = 'Pro_Codigo'
    end
    object cdsPro_Nome: TStringField
      FieldName = 'Pro_Nome'
    end
    object cdsPro_Unidade: TStringField
      FieldName = 'Pro_Unidade'
    end
    object cdsPro_Saldo: TFloatField
      FieldName = 'Pro_Saldo'
    end
    object cdsPro_UltCusto: TFloatField
      FieldName = 'Pro_UltCusto'
    end
  end
end
